home *** CD-ROM | disk | FTP | other *** search
- PAGE ,132
-
- ; Figure 5
- ; Install an Interrupt 24 (DOS critical error exception) handler
-
-
- % .MODEL memodel,lang ;Add model and language support via
- ;command line macros, e.g.
- ;MASM /Dmemodel=LARGE /Dlang=C
-
- .DATA?
-
- PUBLIC cedevdvr, cetype, ceerror, cereturn
- _origvec dd ?
- _newvec dd ?
- cedevdvr dd ?
- cetype dw ?
- ceerror dw ?
- cereturn db ?
-
- .CODE
-
- ;
- ; This is our actual ISR
- ;
- myint24:
- push ds ;save registers which may be
- push es ;required in case "Retry" is
- push bx ;selected
- push cx
- push dx
- push si
- push di
- push bp
- mov word PTR cedevdvr,si ;save device driver header address
- mov word PTR cedevdvr+2,bp
- mov cetype,ax ;save error type information
- mov ceerror,di ;save error code information
- call far PTR _newvec ;call our handler
- mov al,cereturn ;set up return code (abort, retry...)
- pop bp ;restore necessary registers
- pop di
- pop si
- pop dx
- pop cx
- pop bx
- pop es
- pop ds
- iret
-
- ;
- ; Call this to install our ISR
- ;
- ins24 PROC USES AX BX DS ES, segm:WORD, offs:WORD
- mov ax,3524h ;get old vector...
- int 21h
- mov word PTR _origvec,bx
- mov word PTR _origvec+2,es ;...and save it
- mov ax,offs ;load handler offset...
- mov word PTR _newvec,ax
- mov ax,segm ; & segment into _newvec
- mov word PTR _newvec+2,ax
- push cs ;get myint24 segment in DS
- pop ds
- mov dx, OFFSET myint24 ;install myint24 in int 24h
- mov ax,2524h ; into Interrupt 24h
- int 21h
- ins24 ENDP
-
- ;
- ; Call this to uninstall our ISR
- ;
- redo24 PROC USES AX BX DS
- mov dx, word PTR _origvec ;restore original vector
- mov ds, word PTR _origvec+2
- mov ax,2524h
- int 21h
- ret
- redo24 ENDP
-
- end
-